package com.yuehuanghun.admin.core.service.impl;

import java.util.ArrayList;
import java.util.Collections;
import java.util.Iterator;
import java.util.List;
import java.util.Set;
import java.util.stream.Collectors;

import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;

import com.yuehuanghun.admin.core.config.DataScope;
import com.yuehuanghun.admin.core.config.UserConstants;
import com.yuehuanghun.admin.core.config.util.UserUtils;
import com.yuehuanghun.admin.core.domain.SysDept;
import com.yuehuanghun.admin.core.domain.SysRole;
import com.yuehuanghun.admin.core.domain.vo.TreeSelect;
import com.yuehuanghun.admin.core.mapper.SysDeptMapper;
import com.yuehuanghun.admin.core.mapper.SysRoleMapper;
import com.yuehuanghun.admin.core.mapper.SysUserMapper;
import com.yuehuanghun.admin.core.service.ISysDeptService;
import com.yuehuanghun.framework.exception.BizException;
import com.yuehuanghun.framework.exception.ValidateException;
import com.yuehuanghun.framework.util.StringUtils;
import com.yuehuanghun.framework.util.text.Convert;
import com.yuehuanghun.mybatis.milu.criteria.QueryPredicate;
import com.yuehuanghun.mybatis.milu.criteria.QueryPredicateImpl;
import com.yuehuanghun.mybatis.milu.ext.BaseServiceImpl;

/**
 * 部门管理 服务实现
 * 
 * @author yadmin
 */
@Service
public class SysDeptServiceImpl extends BaseServiceImpl<SysDept, Long, SysDeptMapper> implements ISysDeptService {

	@Autowired
	private SysRoleMapper roleMapper;

	@Autowired
	private SysUserMapper sysUserMapper;

	/**
	 * 查询部门管理数据
	 * 
	 * @param dept 部门信息
	 * @return 部门信息集合
	 */
	@Override
	public List<SysDept> getDeptList(SysDept dept) {
		QueryPredicate p = new QueryPredicateImpl();
		p.eq("delFlag", "0")
		  .eq(dept.getParentId() != null && dept.getParentId() != 0, "parentId", dept.getParentId())
		  .contain("deptName", dept.getDeptName())
		  .eq("status", dept.getStatus())
		  .orderAsc("parentId", "orderNum");
		
		DataScope dataScope = UserUtils.getCurrentUserDataScope();
		if(dataScope.isDeptScope() && dataScope.getDeptIds() != null) {
			if(dataScope.getDeptIds().isEmpty()) {
				return Collections.emptyList();
			} else {
				p.in("deptId", dataScope.getDeptIds());
			}
		}
		
		return domainMapper.findByCriteria(p);
	}

	/**
	 * 构建前端所需要树结构
	 * 
	 * @param depts 部门列表
	 * @return 树结构列表
	 */
	@Override
	public List<SysDept> buildDeptTree(List<SysDept> depts) {
		List<SysDept> returnList = new ArrayList<>();
		List<Long> tempList = new ArrayList<>();
		for (SysDept dept : depts) {
			tempList.add(dept.getDeptId());
		}
		for (Iterator<SysDept> iterator = depts.iterator(); iterator.hasNext();) {
			SysDept dept = iterator.next();
			// 如果是顶级节点, 遍历该父节点的所有子节点
			if (!tempList.contains(dept.getParentId())) {
				recursionFn(depts, dept);
				returnList.add(dept);
			}
		}
		if (returnList.isEmpty()) {
			returnList = depts;
		}
		return returnList;
	}

	/**
	 * 构建前端所需要下拉树结构
	 * 
	 * @param depts 部门列表
	 * @return 下拉树结构列表
	 */
	@Override
	public List<TreeSelect> buildDeptTreeSelect(List<SysDept> depts) {
		List<SysDept> deptTrees = buildDeptTree(depts);
		return deptTrees.stream().map(TreeSelect::new).collect(Collectors.toList());
	}

	/**
	 * 根据角色ID查询部门树信息
	 * 
	 * @param roleId 角色ID
	 * @return 选中部门列表
	 */
	@Override
	public List<Long> getDeptListByRoleId(Long roleId) {
		SysRole role = roleMapper.findById(roleId).orElseThrow(() -> new ValidateException("角色不存在"));
		Set<Long> excludeParentIds;
		if(role.getDeptCheckStrictly()) {
			excludeParentIds = domainMapper.findParentIdsByRolesRoleId(roleId);
		} else {
			excludeParentIds = null;
		}
		return domainMapper.findByCriteria(p -> p.selects("deptId").eq("rolesRoleId", roleId).notIn("deptId", excludeParentIds)).stream().map(SysDept::getDeptId).collect(Collectors.toList());
	}

	/**
	 * 根据ID查询所有子部门（正常状态）
	 * 
	 * @param deptId 部门ID
	 * @return 子部门数
	 */
	@Override
	public int getNormalChildrenDeptById(Long deptId) {
		return domainMapper.countByLambdaCriteria(p -> p.eq(SysDept::getStatus, "0").eq(SysDept::getDelFlag, "0").contain(SysDept::getAncestors, ":" + deptId + ":"));
	}

	/**
	 * 是否存在子节点
	 * 
	 * @param deptId 部门ID
	 * @return 结果
	 */
	@Override
	public boolean hasChildByDeptId(Long deptId) {
		int result = domainMapper.countByParentIdAndDelFlag(deptId, "0");
		return result > 0;
	}

	/**
	 * 查询部门是否存在用户
	 * 
	 * @param deptId 部门ID
	 * @return 结果 true 存在 false 不存在
	 */
	@Override
	public boolean checkDeptExistUser(Long deptId) {
		int result = sysUserMapper.countByDeptIdAndDelFlag(deptId, "0");
		return result > 0;
	}

	/**
	 * 校验部门名称是否唯一
	 * 
	 * @param dept 部门信息
	 * @return 结果
	 */
	@Override
	public String checkDeptNameUnique(SysDept dept) {
		Long deptId = StringUtils.isNull(dept.getDeptId()) ? -1L : dept.getDeptId();
		SysDept info = domainMapper.findFirstByDeptNameAndParentId(dept.getDeptName(), dept.getParentId());
		if (StringUtils.isNotNull(info) && info.getDeptId().longValue() != deptId.longValue()) {
			return UserConstants.NOT_UNIQUE;
		}
		return UserConstants.UNIQUE;
	}

	/**
	 * 新增保存部门信息
	 * 
	 * @param dept 部门信息
	 * @return 结果
	 */
	@Override
	public int insertDept(SysDept dept) {
		SysDept info = domainMapper.findById(dept.getParentId()).orElseThrow(() -> new BizException("上级部门不存在：" + dept.getParentId()));
		// 如果父节点不为正常状态,则不允许新增子节点
		if (!UserConstants.DEPT_NORMAL.equals(info.getStatus())) {
			throw new ValidateException("部门停用，不允许新增");
		}
		dept.setAncestors(info.getAncestors() + dept.getParentId() + ":");
		return domainMapper.insert(dept);
	}

	/**
	 * 修改保存部门信息
	 * 
	 * @param dept 部门信息
	 * @return 结果
	 */
	@Override
	public int updateDept(SysDept dept) {
		SysDept newParentDept = domainMapper.findById(dept.getParentId()).orElse(null);
		SysDept oldDept = domainMapper.findById(dept.getDeptId()).orElse(null);
		if (StringUtils.isNotNull(newParentDept) && StringUtils.isNotNull(oldDept)) {
			String newAncestors = newParentDept.getAncestors() + newParentDept.getDeptId() + ":";
			String oldAncestors = oldDept.getAncestors(); //NOSONAR
			dept.setAncestors(newAncestors);
			updateDeptChildren(dept.getDeptId(), newAncestors, oldAncestors);
		}
		int result = domainMapper.updateById(dept);
		if (UserConstants.DEPT_NORMAL.equals(dept.getStatus())) {
			// 如果该部门是启用状态，则启用该部门的所有上级部门
			updateParentDeptStatus(dept);
		}
		return result;
	}

	/**
	 * 修改该部门的父级部门状态
	 * 
	 * @param dept 当前部门
	 */
	private void updateParentDeptStatus(SysDept dept) {
		if(StringUtils.isBlank(dept.getAncestors())) { //NOSONAR
			return;
		}
		SysDept updateDept = new SysDept();
		updateDept.setStatus(UserConstants.DEPT_NORMAL);
		updateDept.setUpdateBy(dept.getUpdateBy());
		domainMapper.updateByLambdaCriteria(updateDept, p -> p.in(SysDept::getDeptId, Convert.toLongList(dept.getAncestors())));
	}

	/**
	 * 修改子元素关系
	 * 
	 * @param deptId       被修改的部门ID
	 * @param newAncestors 新的父ID集合
	 * @param oldAncestors 旧的父ID集合
	 */
	@Transactional
	public void updateDeptChildren(Long deptId, String newAncestors, String oldAncestors) {
		List<SysDept> children = domainMapper.findByLambdaCriteria(p -> p.startWith(SysDept::getAncestors, oldAncestors));
		SysDept updateParam = new SysDept();
		for (SysDept child : children) {
			updateParam.setDeptId(child.getDeptId());
			updateParam.setAncestors(child.getAncestors().replace(oldAncestors, newAncestors));
			domainMapper.updateById(updateParam);
		}
	}

	/**
	 * 删除部门管理信息
	 * 
	 * @param deptId 部门ID
	 * @return 结果
	 */
	@Override
	public int deleteDeptById(Long deptId) {
		SysDept updateParam = new SysDept();
		updateParam.setDeptId(deptId);
		updateParam.setDelFlag("2"); //删除状态,0:正常，2:删除
		return domainMapper.updateById(updateParam);
	}

	/**
	 * 递归列表
	 */
	private void recursionFn(List<SysDept> list, SysDept t) {
		// 得到子节点列表
		List<SysDept> childList = getChildList(list, t);
		t.setChildren(childList);
		for (SysDept tChild : childList) {
			if (hasChild(list, tChild)) {
				recursionFn(list, tChild);
			}
		}
	}

	/**
	 * 得到子节点列表
	 */
	private List<SysDept> getChildList(List<SysDept> list, SysDept t) {
		List<SysDept> tlist = new ArrayList<>();
		Iterator<SysDept> it = list.iterator();
		while (it.hasNext()) {
			SysDept n = it.next();
			if (StringUtils.isNotNull(n.getParentId()) && n.getParentId().longValue() == t.getDeptId().longValue()) {
				tlist.add(n);
			}
		}
		return tlist;
	}

	/**
	 * 判断是否有子节点
	 */
	private boolean hasChild(List<SysDept> list, SysDept t) {
		return !getChildList(list, t).isEmpty();
	}
}
